home *** CD-ROM | disk | FTP | other *** search
/ BBS Toolkit / BBS Toolkit.iso / qbbs / qbbs276s.zip / RICK-L.ZIP / MAIN-DIR.ZIP / CALLS.BAT next >
DOS Batch File  |  1993-01-01  |  7KB  |  280 lines
  1. REM > D:\CALLS.!!!
  2. rem DEL D:\CALLS.LOG
  3. datenumb echo @@ ## && >> d:\calls.log
  4. d:
  5. cd\favdoor
  6. favdoor
  7. copy favdoor.a* d:\quick\txtfiles\favdor1.a*
  8. copy favuser.a* d:\quick\txtfiles\favdor2.a*
  9. copy favusdor.a* d:\quick\txtfiles\favdor3.a*
  10. cd\quick
  11. SYSTEMAN Computer_Assoc_of_La d:\quick\txtfiles\BULLET11.ANS d:\quick\txtfiles\BULLET11.asc
  12. ISNEWMON
  13. IF ERRORLEVEL 255 goto newmonth
  14.  
  15. :continue
  16. rem Daily Processing
  17.  
  18. :cleanup
  19. d:
  20. cd\messages
  21. fdel delete \messages\badecho\*.msg 1 -ed:\messages\protect.lst
  22. sweep fdel delete *.msg 7 -ed:\messages\protect.lst
  23. sweep msgnum -r .
  24. echo cleanup completed >> d:\calls.log
  25.  
  26. :logmaint
  27. d:
  28. cd\quick
  29. CD\
  30. dblog 3 d:\quick\mbutil.log
  31. dblog 14 d:\quick\mta__run.log
  32. DBLOG 21 D:\QUICK\MTA__ERR.LOG
  33. dblog 7 d:\dbridge\echo.his
  34. dblog 7 d:\dbridge\inbound.his
  35. dblog 7 d:\dbridge\out.his
  36. del d:\quick\raquser.log
  37. del d:\dbridge\stack.log
  38. rem ren \quick\txtfiles\welcome.* welcomez.*
  39. rem ren \quick\txtfiles\welcomex.* welcome.*
  40. rem ren \quick\txtfiles\welcomez.* welcomex.*
  41. FDEL DELETE D:\QUICK\QUEUE\L-*.* 7
  42. FDEL DELETE D:\QUICK\QUEUE\M-*.* 7
  43. FDEL DELETE D:\QUICK\QUEUE\*.* 30
  44. echo log maintenance completed >> d:\calls.log
  45.  
  46. :filelist
  47. C:
  48. CD\work
  49. DEL *.FLS
  50. DEL LISTEM.LOG
  51. listem all.ctl
  52. copy 384-3.dfb d:\dbridge\dfb
  53. DEL C:\DOWN\FILELIST\CAFILES.ZIP
  54. PKZIP -ex -o -! C:\DOWN\FILELIST\CAFILES 384-3.DFB
  55. DBUTIL CRASH SEND 1:384/1 C:\DOWN\FILELIST\CAFILES.ZIP
  56. DBUTIL CRASH SEND 1:384/4 C:\DOWN\FILELIST\CAFILES.ZIP
  57. DBUTIL CRASH SEND 50:5504/10 C:\DOWN\FILELIST\CAFILES.ZIP
  58. DBUTIL CRASH SEND 50:5504/50 C:\DOWN\FILELIST\CAFILES.ZIP
  59. DBUTIL CRASH REQUEST 50:5504/50 CASTLE.ZIP
  60. rem > d:\dbridge\dbridge.rsn
  61. C:
  62. cd\work
  63. listem new-30.ctl
  64. del C:\DOWN\FILELIST\canew-30.zip
  65. PKZIP -M -ex -o -! C:\DOWN\FILELIST\canew-30 canew-30.fls
  66. listem NEW-10.ctl
  67. del C:\DOWN\FILELIST\canew-10.zip
  68. PKZIP -M -ex -o -! C:\DOWN\FILELIST\canew-10 canew-10.fls
  69. ZIPCOMNT C:\DOWN\FILELIST\*.zip
  70. pkzip -m -ex -o -! c:\mscomm\cabbslst d:\quick\bbsbase\bbs.lst
  71. zipcomnt  c:\mscomm\cabbslst.zip
  72. d:
  73. cd\acfiles
  74. ACF_UTIL /MAINT TRUNC
  75. ACF_UTIL /MAINT sort
  76. ACF_UTIL /MAINT neat
  77. ACF_UTIL /MAINT integ
  78. ACF_UTIL /MAINT fdbdate
  79. ACF_UTIL /MAINT fdbstamp
  80. ACF_UTIL /MAINT gifres 47 48 53
  81. ACF_UTIL /MAINT fdbadd
  82. ACF_UTIL /MAINT offline
  83. ACF_UTIL /master
  84. cd\quick
  85. CD\megalist
  86. DEL 384-3LST.TXT
  87. del C:\DOWN\FILELIST\384-3lst.zip
  88. mlupd
  89. ML-COL BUILD MEGALIST
  90. REN MEGALIST.TXT 384-3LST.TXT
  91. PKZIP -U -EX -! C:\DOWN\FILELIST\384-3LST D:\megalist\384-3LST.TXT
  92. DEL D:\megalist\MEGALIST.TXT
  93. DEL D:\megalist\MEGALIST.ARC
  94. CD\QUICK
  95. echo filelist completed >> d:\calls.log
  96.  
  97. :gamemnt
  98. c:
  99. cd \games\bchess
  100. c2-maint fri 30
  101. cd \games\chess
  102. chreport 10 > d:\quick\txtfiles\scores32.asc
  103. cd\games\hangman
  104. maint 30
  105. cd\games\solitair
  106. maint 30
  107. cd\games\survivor
  108. maint 30
  109. cd\games\bjack
  110. maint 30
  111. cd\games\vidpoker
  112. maint 30
  113. cd\games\fishing
  114. fishmant
  115. fishtext d:\quick\txtfiles\scores51.asc d:\quick\txtfiles\scores51.ans
  116. cd \doors\murphy
  117. del dorinfo?.def
  118. murphy
  119. copy murphy.a* d:\quick\txtfiles\BULLET9.*
  120. cd\doors\cryer
  121. mtown
  122. cd\sunrise\wheel
  123. wofevent wheel.cfg
  124. CD\SUNRISE\CRYPTO
  125. CRYPEVNT CRYPTO.CFG
  126. CD\SCRABMN
  127. SDMAINT 30
  128. E:
  129. cd\mcity\rats
  130. rmu d:\quick\
  131. cd\mcity\mcrace
  132. pitmast
  133. CD\MCITY\BEST
  134. CALL BEST
  135. echo game maintenance completed >> d:\calls.log
  136.  
  137.  
  138. :CLEANNL
  139. E:
  140. CD\NLIST
  141. friday /a nodelist
  142. friday /a nodediff
  143. friday /a enetlist
  144. friday /a enetdiff
  145. FRIDAY /A AGAPLIST
  146. FRIDAY /Z DBNET
  147. FRIDAY /Z DBNET C:\DOWN\DBSOFT
  148. FRIDAY /Z DNETLIST
  149. FRIDAY /Z DNETLIST E:\DFN\DIST
  150. FRIDAY /A FMLYDIFF
  151. FRIDAY /A FMLYLIST
  152. FRIDAY /A IPECDIFF
  153. FRIDAY /A IPECLIST
  154. FRIDAY /A JESUSBBS
  155. FRIDAY /A MAILDIFF
  156. FRIDAY /A MAILLIST
  157. friday /z QBSNODES
  158. FRIDAY /Z QBSNODES E:\QFD\NET
  159. FRIDAY /Z QBSNODES D:\NODELIST\HOLD
  160. E:
  161. cd\nlist
  162. fdel cut nodediff.* 1
  163. fdel cut nodelist.* 1
  164. fdel cut fmlydiff.* 1
  165. fdel cut fmlylist.* 1
  166. fdel cut maildiff.* 1
  167. fdel cut maillist.* 1
  168. fdel cut enlistna.* 1
  169. fdel cut enetdiff.* 1
  170. fdel cut enetlist.* 1
  171. fdel cut agapdiff.* 1
  172. fdel cut agaplist.* 1
  173. fdel cut dnetdiff.* 1
  174. fdel cut dnetlist.* 1
  175. FDEL CUT DNETDIFF.* 1
  176. fdel cut ipecdiff.* 1
  177. fdel cut ipeclist.* 1
  178. fdel cut qbsnodes.* 1
  179. fdel cut dbnet.* 1
  180. FDEL CUT JESUSBBS.* 1
  181. cd\echonet\z50admin
  182. fdel cut enetlist.* 1
  183. fdel cut enetdiff.* 1
  184. CD\QUICKBBS
  185. FDEL CUT QBSNODES.* 1
  186. C:
  187. cd\down\dbsoft
  188. fdel cut dbnet.* 1
  189. D:
  190. CD\DBRIDGE
  191. FDEL CUT DBNET.* 1
  192. echo nodelist maintenance completed >> d:\calls.log
  193.  
  194. :TODAY.BAT
  195. set today=c:\today
  196. c:
  197. CD\TODAY
  198. datenumb if not exist today.@@@ pkunzip e:\quickbbs\newday* today.@@@
  199. NewDayPC nopause nowarn > newday.ans
  200. NewDayPC nopause nowarn nocolor > newday.asc
  201. Edlin newday.ans < today_D.bug
  202. Edlin newday.asc < today_D.bug
  203. Copy comassoc.ans + newday.ans d:\quick\txtfiles\bullet10.ans
  204. Copy comassoc.asc + newday.asc d:\quick\txtfiles\bullet10.asc
  205. del newday.asc
  206. del newday.ans
  207. set today=
  208. d:
  209. cd\
  210. echo today completed >> d:\calls.log
  211.  
  212. :ENSYSUPT
  213. E:
  214. cd\echonet\z50admin
  215. del enetsys.zip
  216. copy D:\nodelist\enetlist.* \enetfile
  217. copy enws*.zip \enetfile
  218. copy enapp*.zip \enetfile
  219. copy policy.zip \enetfile
  220. copy list#*.zip \enetfile
  221. cd\enetfile
  222. fdel cut enetlist.* 1
  223. fdel cut enws*.zip 1
  224. fdel cut enapp*.zip 1
  225. fdel cut policy.zip 1
  226. fdel cut list#*.zip 1
  227. pkzip -a -! \echonet\z50admin\enetsys
  228. zipcomnt \echonet\z50admin\enetsys.zip
  229. d:
  230. cd \quick
  231. echo ensysupd completed >> d:\calls.log
  232.  
  233. :END
  234. d:
  235. cd\quick
  236. DEL D:\CALLS.!!!
  237. rem tapxdi keys=z2
  238. rem if errorlevel 1 if not errorlevel 2 dvexec  c:\dv\rq-pif.dvp
  239. rem if errorlevel 0 if not errorlevel 1 exit
  240. rem exit
  241. goto end2
  242.  
  243. :newmonth
  244. :ZIPLOGS
  245. cd\dbridge
  246. mailinfo freq all
  247. cd\quick
  248. datenumb -1 logzip d:\acfiles\transfer.log d:\acfiles\tran@@&&.zip
  249. datenumb -1 logzip d:\dbridge\freq.frq d:\log@@&&.zip
  250. datenumb -1 logzip d:\dbridge\dbridge.log d:\log@@&&.zip
  251. REN D:\QNODE1\system.LOG NOD1.LOG
  252. datenumb -1 logzip d:\QNODE1\NOD1.LOG d:\log@@&&.zip
  253. datenumb -1 logzip d:\quick\tick.log d:\log@@&&.zip
  254. datenumb -1 logzip d:\makenl\makenl.log d:\log@@&&.zip
  255. del d:\quick\mbutil.log
  256. del d:\quick\msgpack.log
  257. del d:\quick\mta__run.log
  258. del d:\quick\raquser.log
  259. del d:\dbridge\db-alpha.log
  260. del d:\dbridge\db-edit.log
  261. del d:\quick\db-alpha.log
  262. sleep month
  263. if errorlevel 112 if not errorlevel 113 DEL C:\TODAY\TODAY.nov
  264. if errorlevel 111 if not errorlevel 112 DEL C:\TODAY\TODAY.oct
  265. if errorlevel 110 if not errorlevel 111 DEL C:\TODAY\TODAY.sep
  266. if errorlevel 109 if not errorlevel 110 DEL C:\TODAY\TODAY.aug
  267. if errorlevel 108 if not errorlevel 109 DEL C:\TODAY\TODAY.jul
  268. if errorlevel 107 if not errorlevel 108 DEL C:\TODAY\TODAY.jun
  269. if errorlevel 106 if not errorlevel 107 DEL C:\TODAY\TODAY.may
  270. if errorlevel 105 if not errorlevel 106 DEL C:\TODAY\TODAY.apr
  271. if errorlevel 104 if not errorlevel 105 DEL C:\TODAY\TODAY.mar
  272. if errorlevel 103 if not errorlevel 104 DEL C:\TODAY\TODAY.feb
  273. if errorlevel 102 if not errorlevel 103 DEL C:\TODAY\TODAY.jan
  274. if errorlevel 101 if not errorlevel 102 DEL C:\TODAY\TODAY.dec
  275. echo new month completed >> d:\calls.log
  276.  
  277. GOTO continue
  278.  
  279. :end2
  280.